home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
fish
/
001-100
/
001-025
/
013
/
talk.bas
< prev
next >
Wrap
BASIC Source File
|
1995-03-17
|
156b
|
7 lines
10 print "Please enter your text"
20 line input text$
30 if text$="" then end
40 ph$=translate$(text$)
50 i%=narrate(ph$,a%())
60 goto 10